2006-10-15 Lennart Borgman <lennart.borgman.073@student.lu.se>

(explicit-bash-args): Use shell-quote-argument.

diff --git a/lisp/shell.el b/lisp/shell.el
index 2adfc79618a9abac5547f0f39f28e749c3537f0d..d3e23251a1facd11bbc394dfc7cd9e8f3c18716a 100644 (file)
--- a/lisp/shell.el
+++ b/lisp/shell.el
@@ -298,7 +298,9 @@ Value is a list of strings, which may be nil."
             (equal name "bash")
             (file-executable-p prog)
             (string-match "bad option"
-                          (shell-command-to-string (concat prog " --noediting"))))
+                          (shell-command-to-string
+                           (concat (shell-quote-argument prog)
+                                   " --noediting"))))
        '("-i")
       '("--noediting" "-i")))
   "Args passed to inferior shell by \\[shell], if the shell is bash.